home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 (Walnut Creek) / Aminet - June 1993 [Walnut Creek].iso / usenet / sources / volume2 / comm / vt100r2a.1
Internet Message Format  |  1988-12-06  |  33KB
  1. Path: xanth!ames!ncar!mailrus!ulowell!page
  2. From: page@swan.ulowell.edu (Bob Page)
  3. Newsgroups: comp.sources.amiga
  4. Subject: v02i090:  vt100 - terminal emulator v2.8a
  5. Message-ID: <10493@swan.ulowell.edu>
  6. Date: 5 Dec 88 22:50:32 GMT
  7. Organization: University of Lowell, Computer Science Dept.
  8. Lines: 930
  9. Approved: page@swan.ulowell.edu
  10.  
  11. Submitted-by: acs@amdahl.com (Tony Sumrall)
  12. Posting-number: Volume 2, Issue 90
  13. Archive-name: comm/vt100r28a.1
  14.  
  15. [These are context diffs that you can apply to your original vt100 v2.8
  16. source code to bring it up to v2.8a.  ..Bob]
  17.  
  18. #    This is a shell archive.
  19. #    Remove everything above and including the cut line.
  20. #    Then run the rest of the file through sh.
  21. #----cut here-----cut here-----cut here-----cut here----#
  22. #!/bin/sh
  23. # shar:    Shell Archiver
  24. #    Run the following text with /bin/sh to create:
  25. #    2.8to2.8a
  26. #    README
  27. # This archive created: Mon Dec  5 17:46:59 1988
  28. cat << \SHAR_EOF > 2.8to2.8a
  29. Prereq: 880117
  30. diff -c old/init.c new/init.c
  31. *** old/init.c    Sat May 28 00:40:16 1988
  32. --- new/init.c    Sat May 28 00:27:09 1988
  33. ***************
  34. *** 1,7 ****
  35.   /***************************************************************
  36.    * vt100 - terminal emulator - initialization
  37.    *
  38. !  *    v2.8 880117 ACS - See the README file
  39.    *    v2.7 870825 ACS - Allow execution of all script files specified on
  40.    *              command line (companion to changes in script.c).
  41.    *              Rolled menu init into one routine (do_menu_init()).
  42. --- 1,9 ----
  43.   /***************************************************************
  44.    * vt100 - terminal emulator - initialization
  45.    *
  46. !  *    v2.8a 880510 ACS - Allow lines 0 in init file to *really* mean
  47. !  *              "use all available lines".
  48. !  *    v2.8 880117 ACS - See vt100.doc.
  49.    *    v2.7 870825 ACS - Allow execution of all script files specified on
  50.    *              command line (companion to changes in script.c).
  51.    *              Rolled menu init into one routine (do_menu_init()).
  52. ***************
  53. *** 211,218 ****
  54.   char    **argv;
  55.       {
  56.       FILE    *fd = NULL;
  57. !     char    *p, *t, *ifile;
  58. !     int     l, dont_init = 0;
  59.   
  60.       doing_init = 1;    /* make sure we only allow INIT script commands */
  61.       if (argc > 1) {
  62. --- 213,220 ----
  63.   char    **argv;
  64.       {
  65.       FILE    *fd = NULL;
  66. !     char    *p = NULL, *t, *ifile;
  67. !     int     l, dont_init = 0, lines0, maxrows;
  68.   
  69.       doing_init = 1;    /* make sure we only allow INIT script commands */
  70.       if (argc > 1) {
  71. ***************
  72. *** 277,295 ****
  73.       cleanup("can't open graphics library",2);
  74.   
  75.       /* Now set up all the screen info as necessary */
  76. !     if(p_lines == 0)    /* Wants to use everything available */
  77. !         if(p_interlace)
  78. !         p_lines = ((GfxBase->NormalDisplayRows*2) - 6) / 8;
  79. !         else
  80. !         p_lines = ((GfxBase->NormalDisplayRows - 6) / 8);
  81.   
  82.       if (p_interlace == 0) {
  83. !     if (p_lines > 24) p_lines = 24;
  84.       MINY = 14;
  85.       NewWindow.Height    = (long)((p_lines*8)+8);
  86.       }
  87.       else {
  88. !     if (p_lines > 48) p_lines = 48;
  89.       MINY = 16;
  90.       NewScreen.ViewModes |= LACE;
  91.       NewWindow.Height    = (long)((p_lines*8)+10);
  92. --- 279,301 ----
  93.       cleanup("can't open graphics library",2);
  94.   
  95.       /* Now set up all the screen info as necessary */
  96. !     maxrows = GfxBase->NormalDisplayRows;
  97. !     if((p_screen == 0) && ((IntuitionBase->ViewLord.Modes & LACE) == 0))
  98. !     p_interlace = 0;
  99.   
  100. +     if(p_interlace)
  101. +     maxrows *= 2;
  102. + 
  103. +     if(lines0 = (p_lines == 0))    /* Wants to use everything available */
  104. +     p_lines = (maxrows - 6) / 8;
  105. + 
  106.       if (p_interlace == 0) {
  107. !     if (!lines0 && p_lines > 24) p_lines = 24;
  108.       MINY = 14;
  109.       NewWindow.Height    = (long)((p_lines*8)+8);
  110.       }
  111.       else {
  112. !     if (!lines0 && p_lines > 48) p_lines = 48;
  113.       MINY = 16;
  114.       NewScreen.ViewModes |= LACE;
  115.       NewWindow.Height    = (long)((p_lines*8)+10);
  116. ***************
  117. *** 310,318 ****
  118.       NewScreen.Height    = (long)((p_lines*8)+16);
  119.   
  120.       if (p_interlace == 1)
  121. !         NewScreen.TopEdge    = (long)(400 - NewScreen.Height);
  122.       else
  123. !         NewScreen.TopEdge    = (long)(208 - NewScreen.Height);
  124.       }
  125.       else {
  126.       p_depth            = 2L;
  127. --- 316,324 ----
  128.       NewScreen.Height    = (long)((p_lines*8)+16);
  129.   
  130.       if (p_interlace == 1)
  131. !         NewScreen.TopEdge    = (long)(maxrows - NewScreen.Height);
  132.       else
  133. !         NewScreen.TopEdge    = (long)((maxrows+8) - NewScreen.Height);
  134.       }
  135.       else {
  136.       p_depth            = 2L;
  137. ***************
  138. *** 324,330 ****
  139.       }
  140.   
  141.       /* see if we exit with a startup script */
  142. !     if (*p == 'e') {
  143.       p = next_wrd(p+l+1,&l);
  144.       if (*p) return(p);
  145.       }
  146. --- 330,336 ----
  147.       }
  148.   
  149.       /* see if we exit with a startup script */
  150. !     if (p && *p == 'e') {
  151.       p = next_wrd(p+l+1,&l);
  152.       if (*p) return(p);
  153.       }
  154. Prereq: 880117
  155. diff -c old/kermit.c new/kermit.c
  156. *** old/kermit.c    Sat May 28 00:40:16 1988
  157. --- new/kermit.c    Sat May 28 00:27:09 1988
  158. ***************
  159. *** 1,7 ****
  160.   /*************************************************************
  161.    * vt100 terminal emulator - KERMIT protocol support
  162.    *
  163. !  *    v2.8 880117 ACS - See the README file
  164.    *    v2.7 870825 ACS - Fixed the "multiple-send" problem in
  165.    *              doksend() et al; show status using the *InfoMsg*()
  166.    *              routines in window.c; fixed erroneous calls to
  167. --- 1,8 ----
  168.   /*************************************************************
  169.    * vt100 terminal emulator - KERMIT protocol support
  170.    *
  171. !  *    v2.8a 880510 ACS - saybye() will allocate packet buffers if it must.
  172. !  *    v2.8 880117 ACS - See vt100.doc.
  173.    *    v2.7 870825 ACS - Fixed the "multiple-send" problem in
  174.    *              doksend() et al; show status using the *InfoMsg*()
  175.    *              routines in window.c; fixed erroneous calls to
  176. ***************
  177. *** 76,83 ****
  178.       rptq,    /* Quote character for repeats */
  179.       ebq,        /* Quote character for 8th bit quoting */
  180.       ackpkt[MAXPACKSIZ+20],    /* ACK/NAK packet buffer */
  181. !     *msgpkt,            /* Message Packet buffer is AllocMem()d */
  182. !     *spackbuf,    /* Dynamically allocated buffer for spack() */
  183.       filnam[40],    /* remote file name */
  184.       snum[10],
  185.       mainmode[10];
  186. --- 77,84 ----
  187.       rptq,    /* Quote character for repeats */
  188.       ebq,        /* Quote character for 8th bit quoting */
  189.       ackpkt[MAXPACKSIZ+20],    /* ACK/NAK packet buffer */
  190. !     *msgpkt = NULL,        /* Message Packet buffer is AllocMem()d */
  191. !     *spackbuf = NULL,    /* Dynamically allocated buffer for spack() */
  192.       filnam[40],    /* remote file name */
  193.       snum[10],
  194.       mainmode[10];
  195. ***************
  196. *** 152,157 ****
  197. --- 153,159 ----
  198.       free_expand(list);
  199.       FreeMem(spackbuf,    (long)(MAXLONGPKS+20));
  200.       FreeMem(msgpkt,    (long)(MAXLONGPKS+20));
  201. +     msgpkt = spackbuf = NULL;
  202.       return(TRUE);
  203.   }
  204.   
  205. ***************
  206. *** 174,179 ****
  207. --- 176,182 ----
  208.       retval  = recsw();
  209.       FreeMem(spackbuf,    (long)(MAXLONGPKS+20));
  210.       FreeMem(msgpkt,    (long)(MAXLONGPKS+20));
  211. +     msgpkt = spackbuf = NULL;
  212.       return(retval);
  213.   }
  214.   
  215. ***************
  216. *** 977,987 ****
  217.   
  218.   saybye()
  219.   {
  220. !    int len,num;
  221.      if(numreqs != 0)    /* Requester's up... */
  222.       Delay(5L);    /* ...so wait for Intuition, just in case. */
  223.      spack('G',n,1,"F");  /* shut down server no more files */
  224.      rpack(&len,&num,ackpkt);
  225.   }
  226.   
  227.   print_our_err()
  228. --- 980,1003 ----
  229.   
  230.   saybye()
  231.   {
  232. !    int len,num, gotmem = 0;
  233. ! 
  234. !    if(msgpkt == NULL) {    /* No msgpkt buffer... */
  235. !     msgpkt    = (char *)AllocMem((long)(MAXLONGPKS+20), MEMF_PUBLIC|MEMF_CLEAR);
  236. !     spackbuf  = (char *)AllocMem((long)(MAXLONGPKS+20), MEMF_PUBLIC|MEMF_CLEAR);
  237. !     gotmem = 1;
  238. !    }
  239. ! 
  240.      if(numreqs != 0)    /* Requester's up... */
  241.       Delay(5L);    /* ...so wait for Intuition, just in case. */
  242.      spack('G',n,1,"F");  /* shut down server no more files */
  243.      rpack(&len,&num,ackpkt);
  244. + 
  245. +    if(gotmem) {
  246. +     FreeMem(spackbuf,    (long)(MAXLONGPKS+20));
  247. +     FreeMem(msgpkt,    (long)(MAXLONGPKS+20));
  248. +     msgpkt = spackbuf = NULL;
  249. +    }       
  250.   }
  251.   
  252.   print_our_err()
  253. Prereq: 880117
  254. diff -c old/script.c new/script.c
  255. *** old/script.c    Sat May 28 00:40:16 1988
  256. --- new/script.c    Sat May 28 00:27:09 1988
  257. ***************
  258. *** 1,7 ****
  259.   /*************************************************************
  260.    * vt100 terminal emulator - Script file support
  261.    *
  262. !  *    v2.8 880117 ACS - See the README file
  263.    *    v2.7 870825 ACS - Wait for the reply from AbortIO().
  264.    *              Use the *InfoMsg*() routines in window.c.  Provide
  265.    *              for multiple script files on command line
  266. --- 1,8 ----
  267.   /*************************************************************
  268.    * vt100 terminal emulator - Script file support
  269.    *
  270. !  *    v2.8a 880510 ACS - Allow comments on XPROTO and FONT.
  271. !  *    v2.8 880117 ACS - See vt100.doc.
  272.    *    v2.7 870825 ACS - Wait for the reply from AbortIO().
  273.    *              Use the *InfoMsg*() routines in window.c.  Provide
  274.    *              for multiple script files on command line
  275. ***************
  276. *** 866,884 ****
  277.   void cmd_xproto(par)
  278.   char    *par;
  279.   {
  280. !     int i, l = strlen(par);
  281.       char temp[40];
  282.   
  283. !     /* downcase the parameter */
  284. !     for(i=0; i<l; i++) par[i] |= ' ';
  285.   
  286.       p_xproto = MODEMAX + 1;    /* Establish a default */
  287.   
  288. !     for(i=0; i<MODEMAX; i++) {
  289. !     if(strcmp(par, &(*(xprotos[i]))) == 0) {
  290. !         p_xproto = i;
  291. !         break;
  292. !     }
  293.       }
  294.       if(p_xproto >= MODEMAX) {
  295.       p_xproto = MODEMAX - 1;
  296. --- 867,890 ----
  297.   void cmd_xproto(par)
  298.   char    *par;
  299.   {
  300. !     int i, len;
  301.       char temp[40];
  302.   
  303. !     next_wrd(par, &len);
  304.   
  305.       p_xproto = MODEMAX + 1;    /* Establish a default */
  306.   
  307. !     if(len) {
  308. !     par[len] = '\0';
  309. ! 
  310. !     /* downcase the parameter */
  311. !     for(i=0; i<len; i++) par[i] |= ' ';
  312. ! 
  313. !     for(i=0; i<MODEMAX; i++)
  314. !         if(strcmp(par, &(*(xprotos[i]))) == 0) {
  315. !         p_xproto = i;
  316. !         break;
  317. !         }
  318.       }
  319.       if(p_xproto >= MODEMAX) {
  320.       p_xproto = MODEMAX - 1;
  321. ***************
  322. *** 890,896 ****
  323.       else
  324.           InfoMsg2Line("Script:", temp);
  325.       }
  326. !     if(doing_init == 0) redofile();
  327.   }
  328.   
  329.   void cmd_numkey(par)
  330. --- 896,902 ----
  331.       else
  332.           InfoMsg2Line("Script:", temp);
  333.       }
  334. !     if(!doing_init) redofile();
  335.   }
  336.   
  337.   void cmd_numkey(par)
  338. ***************
  339. *** 958,980 ****
  340.   void cmd_font(par)
  341.   char    *par;
  342.   {
  343. !     char temp[80]; 
  344.   
  345.       /*  myfontname has been initialized from p_font in InitDefaults() in
  346.       ** init.c */
  347.   
  348. !     if(*par) {
  349. !     if(strlen(par) < MAXFONTVARLEN) {
  350. !         strcpy(myfontname, par);
  351. !         strcat(myfontname,FONTSUFFIX);
  352. !     }
  353. !     else {
  354. !         puts("Init:");
  355. !         sprintf(temp, "Font specification too long, \"%s\" used", myfontname);
  356. !         puts(temp);
  357. !     }
  358.       }
  359.       myattr.ta_Name = (STRPTR)myfontname;
  360.   }
  361.   
  362.   void cmd_inter(par)
  363. --- 964,994 ----
  364.   void cmd_font(par)
  365.   char    *par;
  366.   {
  367. !     char temp[80];
  368. !     int  len;
  369.   
  370. +     next_wrd(par, &len);
  371. + 
  372. +     temp[0] = '\0';
  373. + 
  374.       /*  myfontname has been initialized from p_font in InitDefaults() in
  375.       ** init.c */
  376.   
  377. !     if(!len)
  378. !     sprintf(temp, "Init:\nNo font specified, \"%s\" used", myfontname);
  379. !     else {
  380. !     if(*par && len) {
  381. !         if(len < MAXFONTVARLEN) {
  382. !             par[len] = '\0';
  383. !         strcpy(myfontname, par);
  384. !         strcat(myfontname,FONTSUFFIX);
  385. !         } else
  386. !         sprintf(temp, "Init:\nFont specification too long, \"%s\" used", myfontname);
  387. !         }
  388.       }
  389.       myattr.ta_Name = (STRPTR)myfontname;
  390. +     if(*temp)
  391. +     puts(temp);
  392.   }
  393.   
  394.   void cmd_inter(par)
  395. Prereq: 880117
  396. diff -c old/vt100.c new/vt100.c
  397. *** old/vt100.c    Sat May 28 00:40:16 1988
  398. --- new/vt100.c    Sat May 28 00:27:09 1988
  399. ***************
  400. *** 1,7 ****
  401.   /********************************************************************
  402.    *  vt100 terminal emulator with xmodem transfer capability
  403.    *
  404. !  *    v2.8 880117 ACS - See the README file
  405.    *    v2.7 870825 ACS - Provide handling of the msgs from the
  406.    *              info/status window.
  407.    *    v2.6 870227 DBW - bug fixes for all the stuff in v2.5
  408. --- 1,8 ----
  409.   /********************************************************************
  410.    *  vt100 terminal emulator with xmodem transfer capability
  411.    *
  412. !  *    v2.8a 880510 ACS - Don't ReplyMsg too soon.
  413. !  *    v2.8 880117 ACS - See vt100.doc.
  414.    *    v2.7 870825 ACS - Provide handling of the msgs from the
  415.    *              info/status window.
  416.    *    v2.6 870227 DBW - bug fixes for all the stuff in v2.5
  417. ***************
  418. *** 406,412 ****
  419.           qual = NewMessage->Qualifier;
  420.           if(class == RAWKEY)
  421.               iaddr = *((APTR *)NewMessage->IAddress);
  422. !         ReplyMsg( NewMessage );
  423.           switch( class )
  424.               {
  425.               case CLOSEWINDOW:
  426. --- 407,414 ----
  427.           qual = NewMessage->Qualifier;
  428.           if(class == RAWKEY)
  429.               iaddr = *((APTR *)NewMessage->IAddress);
  430. !         else
  431. !             ReplyMsg( NewMessage );
  432.           switch( class )
  433.               {
  434.               case CLOSEWINDOW:
  435. ***************
  436. *** 415,420 ****
  437. --- 417,423 ----
  438.   
  439.               case RAWKEY:
  440.               len = toasc(&(ascstr[0]), code,qual, 100, iaddr, 0);
  441. +             ReplyMsg( NewMessage );
  442.               if (p_echo) {
  443.               ptr = &(ascstr[0]);
  444.               for(i = 0; i < len; i++)
  445. Prereq: 880117
  446. diff -c old/vt100.h new/vt100.h
  447. *** old/vt100.h    Sat May 28 00:40:16 1988
  448. --- new/vt100.h    Sat May 28 00:27:10 1988
  449. ***************
  450. *** 1,7 ****
  451.   /*********************************************************************
  452.    *  a terminal program that has ascii and xmodem transfer capability
  453.    *
  454. !  *    v2.8 880117 ACS - See the README file
  455.    *    v2.7 870825 ACS - See README.
  456.    *    v2.6 870227 DBW - bug fixes for all the stuff in v2.5
  457.    *    v2.5 870214 DBW - more additions (see readme file)
  458. --- 1,7 ----
  459.   /*********************************************************************
  460.    *  a terminal program that has ascii and xmodem transfer capability
  461.    *
  462. !  *    v2.8a 880510 ACS - Update title to 2.8A.
  463.    *    v2.7 870825 ACS - See README.
  464.    *    v2.6 870227 DBW - bug fixes for all the stuff in v2.5
  465.    *    v2.5 870214 DBW - more additions (see readme file)
  466. ***************
  467. *** 21,27 ****
  468.    ********************************************************************/
  469.   
  470.   /********* major version (used for title of terminal window) *********/
  471. ! #define    VERSION    "VT100 (V2.8 ACS 880117) Terminal Window"
  472.   
  473.   /*********** ########  define the compiler type here ######## ********/
  474.   #define    LATTICE    0
  475. --- 21,27 ----
  476.    ********************************************************************/
  477.   
  478.   /********* major version (used for title of terminal window) *********/
  479. ! #define    VERSION    "VT100 (V2.8A ACS 880510) Terminal Window"
  480.   
  481.   /*********** ########  define the compiler type here ######## ********/
  482.   #define    LATTICE    0
  483. diff -c old/Makefile new/Makefile
  484. *** old/Makefile    Sat May 28 00:40:15 1988
  485. --- new/Makefile    Sat May 28 00:27:09 1988
  486. ***************
  487. *** 2,7 ****
  488. --- 2,8 ----
  489.   #
  490.   # Makefile to build vt100 terminal emulator
  491.   #
  492. + #    v2.8a 880510 ACS - Add CFLAGS and LNFLAGS
  493.   #    v2.8 880117 ACS - See the README file
  494.   #    v2.7 870825 ACS - See the README file
  495.   #    v2.6 870227 DBW - bug fixes for all the stuff in v2.5
  496. ***************
  497. *** 18,23 ****
  498. --- 19,29 ----
  499.   #
  500.   # Don't forget to define the right compiler (MANX or LATTICE) in VT100.H
  501.   #
  502. + # Say:
  503. + #    make CFLAGS=-n LNFLAGS=-g vt100         -or-
  504. + #    make CFLAGS=-n LNFLAGS=-g vt100-w
  505. + # for Manx SDB.
  506. + #
  507.   ######################################################################
  508.   
  509.   OBJS    = vt100.o init.o window.o xmodem.o remote.o \
  510. ***************
  511. *** 24,57 ****
  512.         kermit.o script.o expand.o
  513.   
  514.   vt100    : vt100.syms $(OBJS)
  515. !     ln -o vt100 $(OBJS) -lc
  516.   
  517.   vt100-w    : vt100.syms $(OBJS)
  518. !     ln -w -o vt100-w $(OBJS) -lc
  519.   
  520.   vt100.syms : vt100.h
  521. !     cc -A +Hvt100.syms vt100.h
  522.   
  523.   vt100.o    : vt100.c
  524. !     cc +Ivt100.syms vt100.c
  525.   
  526.   init.o    : init.c
  527. !     cc +Ivt100.syms init.c
  528.   
  529.   window.o : window.c
  530. !     cc +Ivt100.syms window.c
  531.   
  532.   xmodem.o : xmodem.c
  533. !     cc +Ivt100.syms xmodem.c
  534.   
  535.   remote.o : remote.c
  536. !     cc +Ivt100.syms remote.c
  537.   
  538.   kermit.o : kermit.c
  539. !     cc +Ivt100.syms kermit.c
  540.   
  541.   script.o : script.c
  542. !     cc +Ivt100.syms script.c
  543.   
  544.   expand.o : expand.c
  545. !     cc +Ivt100.syms expand.c
  546. --- 30,63 ----
  547.         kermit.o script.o expand.o
  548.   
  549.   vt100    : vt100.syms $(OBJS)
  550. !     ln +q -o vt100 $(OBJS) -lc
  551.   
  552.   vt100-w    : vt100.syms $(OBJS)
  553. !     ln +q $(LNFLAGS) -o vt100-w $(OBJS) -lc
  554.   
  555.   vt100.syms : vt100.h
  556. !     cc -A +Hvt100.syms $(CFLAGS) vt100.h
  557.   
  558.   vt100.o    : vt100.c
  559. !     cc +Ivt100.syms $(CFLAGS) vt100.c
  560.   
  561.   init.o    : init.c
  562. !     cc +Ivt100.syms $(CFLAGS) init.c
  563.   
  564.   window.o : window.c
  565. !     cc +Ivt100.syms $(CFLAGS) window.c
  566.   
  567.   xmodem.o : xmodem.c
  568. !     cc +Ivt100.syms $(CFLAGS) xmodem.c
  569.   
  570.   remote.o : remote.c
  571. !     cc +Ivt100.syms $(CFLAGS) remote.c
  572.   
  573.   kermit.o : kermit.c
  574. !     cc +Ivt100.syms $(CFLAGS) kermit.c
  575.   
  576.   script.o : script.c
  577. !     cc +Ivt100.syms $(CFLAGS) script.c
  578.   
  579.   expand.o : expand.c
  580. !     cc +Ivt100.syms $(CFLAGS) expand.c
  581. SHAR_EOF
  582. cat << \SHAR_EOF > README
  583. This archive contains a vt100 emulator with KERMIT and XMODEM file
  584. transfer protocols.  Original work by Dave Wecker, V2.7-V2.8A by
  585. Tony Sumrall.
  586.  
  587.  
  588.  
  589. -------
  590. Thanks:
  591. -------
  592.     To everyone who sent in code, suggestions and fixes!
  593.  
  594.  
  595.  
  596. ---------
  597. Releases:
  598. ---------
  599.     v2.8A 880510 ACS- See Release Notes.
  600.     v2.8 880117 ACS    - See Release Notes.
  601.     v2.7 870825 ACS    - See Release Notes.
  602.     v2.6 870227 DBW    - bug fixes for all the stuff in v2.5
  603.     v2.5 870214 DBW    - more additions (see readme file)
  604.     v2.4 861214 DBW    - lots of fixes/additions
  605.     v2.3 861101 DBW    - minor bug fixes
  606.     v2.2 861012 DBW    - more of the same
  607.     v2.1 860915 DBW    - new features (see README)
  608.     v2.0 860823 DBW    - Major rewrite
  609.     v1.1 860720 DBW    - Switches, 80 cols, colors, bug fixes
  610.     v1.0 860712 DBW    - First version released
  611.  
  612.  
  613.  
  614. ------
  615. Usage:
  616. ------
  617.     Please read VT100.DOC for usage information and examples.
  618.  
  619.  
  620.  
  621. --------------
  622. Release Notes:
  623. --------------
  624. v2.8A 880510 ACS- saybye() was using unallocated memory.
  625.     - vt100.c would ReplyMsg() prior to using RawKeyConvert().
  626.     - LINES 0 should now really allow you to use all available lines
  627.       on your MoreRow'ed screen.  I mean it.
  628.     - allow comments on XPROTO and FONT script command lines.
  629.  
  630. v2.8 880117 ACS - Info/Status window automatically deselected.
  631.     - 1st menu item re-worked.  Now the user need only choose Send,
  632.       Receive, Kermit Get, Kermit Bye and Capture.  Protocol to send or
  633.       receive is selected via the 1st sub-menu from the 1st menu item.
  634.     - New command: XPROTO XMODEM | XMODEMCRC | ASCII | KERMIT to select
  635.       transfer protocol via scripts.
  636.     - User may capture simultaneously with sending or receiving via
  637.       a different protocol by using the Capture menu item.  This item
  638.       changes to Capturing when capture is in effect.
  639.     - Kermit will transfer long packets (up to 1000 bytes).  New cmd:
  640.       "KMAXPACK n" sets maximum packet length to n bytes.  Remember to
  641.       increase your send and/or receive timeouts on your host!!!
  642.     - Added insert/delete character to the recognized escape sequences.
  643.       ESC [ n @ inserts n characters, ESC [ n P deletes n characters
  644.       (thanks to John Wang (jwang@ATRP.MEDIA.MIT.EDU)).  He suggests 
  645.       using the following termcap:
  646.       CA|vt100|amiga|Amiga termcap:al=\E[L:AL=\E[%dL:am:bl=^G:bs:cd=\E[J:\
  647.         :ce=\E[K:cl=\E[;H\E[2J:cm=\E[%i%d;%dH:co#80:cr=^M:cs=\E[%i%d;%dr:\
  648.         :dc=\E[P:DC=\E[%dP:dl=\E[M:DL=\E[%dM:do=^J:ho=\E[H:\
  649.         :is=\E[1;24r\E[24;1H:ic=\E[@:IC=\E[%d@:kb=^H:kd=\E[B:\
  650.         :ke=\E[?1l\E>:kl=\E[D:kr=\E[C:ks=\E[?1h\E=:ku=\E[A:k1=\EOP:\
  651.         :k2=\EOQ:k3=\EOR:k4=\EOS:le=^H:li#24:mb=\E[5m:md=\E[1m:me=\E[m:\
  652.         :mr=\E[7m:nd=\E[C:pt:rc=\E8:rf=/usr/lib/tabset/vt100:\
  653.         :rs=\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h:sc=\E7:se=\E[m:\
  654.         :sf=^J:so=\E[7m:sr=\EM:ta=^I:ue=\E[m:up=\E[A:us=\E[4m:vc#16:vt#3:xn:
  655.     - Fixed scroll regions.  Now will not wrap-around out of a scroll
  656.       region. (thanks to Tad Guy (ames!xanth.cs.odu.edu!tadguy))
  657.     - Fixed the FileLock() problem (thanks to many!).
  658.     - The "nagging requester" bug was a bug in *my* code (gasp!).  Thanks
  659.       to Joel Swank (joels@tekred.TEK.COM) for finding and squashing it!
  660.     - Fixed overzealous xmodem chopping.  It now strips contiguous
  661.       strings of nulls OR Ctrl-Z (not a mixture) and will avoid writing
  662.       anything if they were all chopped.  Thanks to Wayne Davison
  663.       (drivax!davison--I only had to modify it a little, Wayne).  Also,
  664.       when sending, it now sends a stream of nulls OR Ctrl-Zs, whichever
  665.       is NOT the last character.
  666.     - Removed an extraneous continue in readchar().  Thanks to someone!
  667.       (Sorry, I lost your name and address.)
  668.     - Now uses the default keymap.  All of the old mappings have been
  669.       retained (e.g. Ctrl-2 generates Ctrl-@, Ctrl-6 generates Ctrl-^,
  670.       ALT acts as META key (i.e. sets the high-order bit)).  Note,
  671.       however, that your keymap may preclude the use of the ALT key if
  672.       dead keys are defined.  A future version will support specification
  673.       of a keymap different from the system map.
  674.     - New commands: SENDF file-spec and REC file which will send/receive
  675.       via the default XPROTO setting.  You still have XS, KR, etc.
  676.     - New command: FONT font-name.  Allows the user to specify which
  677.       8-point font to use.  If you want to use your new whippy-font, sau
  678.       FONT whippy-font.  These must be 8-point fonts for now!
  679.     - Saying LINES 0 will use all available lines on the screen (useful
  680.       to you MoreRows groupies).
  681.     - P_unit may be changed in vt100.c to specify a different unit of
  682.       the serial.device to use (for expansion serial ports).  As of this
  683.       writing there are no expansion serial devices...this is just in
  684.       preparation for the future.  Also provided a new INIT command:
  685.       UNIT which accomplishes the same result.
  686.  
  687. v2.7 870825 ACS - Requester is only used for input.  A new window (the
  688.       Info/Xfer Status window) now shows what used to go there and the
  689.       requester now comes up in this window.  The window is sizable,
  690.       draggable, closeable and front-to-backable; when re-opened it
  691.       will appear in its last location with its last dimensions.  The
  692.       window ignores input but will become active when it's first
  693.       displayed as well as when a requester is put up in it.  To
  694.       cancel a transfer request, first ensure that the mail VT100
  695.       windiw is active then hit ESC in it.
  696.     - KERMIT mode has been hardened and wildcarded files can be sent
  697.       to a KERMIT that is *not* in server mode.  E.g. you may say
  698.       RECEIVE to your host's KERMIT then send Foo* -- all files
  699.       starting with Foo in the current directory will be sent.
  700.     - New command line switches -i and +i.  -I says don't use an init
  701.       file, +i file says use "file".  User may also specify script
  702.       files on the command line which will be executed in sequence.
  703.     - New init file command SHORTCUT.  See vt100.doc.
  704.     - I've included the font code.  It looks for an env variable named
  705.       "font" (yes, lowercase) and, if found, uses that font for its
  706.       test.  If you don't like it you may wanna remove it.  I was gonna
  707.       ifdef it but I ran out of time.  Remember that there's a PD set
  708.       cmd to allow Lattice users to set env vars.
  709.     - Nagging bug: On 2nd and subsequent uses of the requester, the
  710.       1st character of the last use is redisplayed.  Intuition bug?
  711.  
  712. v2.6 870227 DBW - bug fixes for all the stuff in v2.5
  713.     - Input requestors are now self selecting (ignore comment in 2.5)
  714.     - Added a BS<->DEL menu item and startup option (SWAP ON/OFF)
  715.     - Renamed dopen/dnext/dclose to diropen/dirnext/dirclose for LATTICE
  716.     - Added a CONVERT option that tells whether KERMIT should downcase
  717.     - MAJOR CHANGE: re write the INPUT/SCRIPT commands, see VT100.DOC
  718.     - Fixed a major problem with Set Directory causing LOCK conflicts
  719.     - Moved the Title up 1 pixel so that it doesn't get cut off anymore
  720.  
  721. v2.5 870214 DBW - more additions (see readme file)
  722.     - All prompting now done through a string requester/gadget.
  723.       NOTE: YOU MUST SELECT THE INPUT STRING OF THE REQUESTER BEFORE
  724.         YOU CAN TYPE A RESPONSE.
  725.     - Local echo mode added (half duplex for Carolyn)
  726.     - BEEP command added to SCRIPT
  727.     - New menu/init/script items:
  728.         CLEAR SCREEN    - clears the screen
  729.          ECHO        - turns on/off half duplex mode
  730.         WRAP        - turns on/off autowrap on long lines
  731.         NUMKEY        - turns on/off numeric keypad mode
  732.         APPCUR        - turns on/off application cursor mode
  733.     - Rewrote toasc() to use qualifier field (no more getting the
  734.       keyboard "stuck")
  735.     - Fixed locking of directories (should now run under workbench ok)
  736.     - Cleaned up VT100.H to really check includes on compile
  737.     - Setting font explicitly to TOPAZ 8 (no more dumb assumptions)
  738.  
  739. v2.4 861214 DBW - lots of fixes/additions
  740.     - Beep should now work under Lattice
  741.     - CreatePort now passes longs (as it should always have)
  742.     - Nested comments in KERMIT.C removed
  743.     - Beep volume of 0 (DisplayBeep) now works
  744.     - snum[] declaration in KERMIT.C fixed
  745.     - multi_xfer is now void and return fixed (in kermit)
  746.     - "." can no longer get "stuck" as the break key
  747.  
  748.     - RIGHT-AMIGA-keys have been added for most menu items
  749.     - The ALT key is now an EIGHTth bit shifter
  750.     - Control-@, Control-2, Control-space send the NULL character
  751.     - Control-6 now sends Control-^
  752.     - Control-- and Control-? now sends Control-_
  753.     - Cursor application mode (<esc>[?1h and <esc>[?1l) now work
  754.     - XMODEM now masks the eighth bit if parity is other than NONE
  755.  
  756. v2.3 861101 DBW - minor bug fixes:
  757.     - added p_wbcolors to allow workbench colors on custom screen
  758.       (In the init file you can specify WBCOLORS to be NO (use color
  759.        definitions in INIT FILE or VT100.H) or YES (use WORKBENCH
  760.        colors for everything)).
  761.     - "$" now sends a kermit-bye (like it says in VT100.DOC).
  762.     - made window/screen heights more reasonable
  763.     - Added ANSI insert line and delete line (<csi><num>L and
  764.       <csi><num>M) to speed up various editors (like emacs).
  765.       NOTE: This is NOT a VT100 sequence (new extension).
  766.     - ctrl-space now also sends a null (along with ^@ and ^`)
  767.     - RAWKEY fixed in WINDOW.C
  768.     - p_wrap fixed in WINDOW.C
  769.     - removed WRDMAX from VT100.H
  770.     - fixed exit with no params in SCRIPT.C
  771.     - fixed parity comparisons in KERMIT.C
  772.     - init file [n+1] changed to [nplus1] to make Lattice happy.
  773.     - cursoron(), cursoroff() changed to one routine cursorflip().
  774.     - long lines shortened to less than 80 characters (for gateways).
  775.     - blanks following exit (or comments) now work in scripts.
  776.  
  777. v2.2 861012 DBW - more of the same:
  778.     - The INIT file "exit" can now chain to a script
  779.     - The SCRIPT command "exit" can now chain to another script
  780.     - Hangup menu item now works.
  781.     - Autowrap can now be set from VT100.H, VT100.INIT (<esc>[?7h l)
  782.     - Control-G is now handled with an audible beep
  783.     - Script now used "^chr" to send control characters
  784.     - The graphics "box" character (a) was added
  785.     - Control-@ and Control-` now send the NULL character
  786.     - Alternate color for BOLD has been re-instated by popular demand
  787.     - Menus have been cleaned up.
  788.     - Lattice compilation cleaned up.
  789.     - No more wordsize parameter since PARITY takes care of all cases
  790.     - Function keys can now call scripts
  791.     - Double shift keys are now handled correctly.
  792.     - Version has been added to the title bar (for bug reports).
  793.  
  794. v2.1 860915 DBW - new features / bug fixes
  795.     - Now identifies as a VT100 (including the response to <esc>Z)
  796.     - Cursor color now gets read in as hex (instead of decimal)
  797.     - REPORTMOUSE taken out of definitions (not needed)
  798.     - XON/XOFF now being handled by the device driver instead of me
  799.     - Literal escape characters have been replaced with \033
  800.     - At init time the user can now specify the input BUFFER size
  801.       (typically between 512 and 2048 bytes) depending on baud rate
  802.     - Script files are now case insensitive for commands
  803.     - XMODEM now turns off the driver XON/XOFF during transfers
  804.     - Graphic rendition now done by the OS instead of me.
  805.     - Initialization files are now searched for in S: instead of C:
  806.     - Forward GOTO bug fixed in the script package.
  807.     - Keypad can now be used in both numeric and application mode
  808.     - General purpose cleanup() routine added for all exits.
  809.     - Utility menu added (sendbreak, hangup, change directory).
  810.       NOTE: hangup is not implemented yet.
  811.     - Full wild card support in file transfers (see vt100.doc).
  812.     - Kermit cleaned up with better filename handling (from host).
  813.     - Script now has CD (changed directory) and SB (send break) commands
  814.     - Added Parity and Wordsize choices in VT100.H, VT100.INIT, menu
  815.       and scripts. (Generates parity from a table).
  816.     - Added 8th bit quoting in KERMIT when using 7 bit words (ODD or
  817.       EVEN parity).
  818.     - Break time can be set from VT100.H, VT100.INIT or a script file.
  819.     - Transfer mode (image or CRLF) can now be set from a script file.
  820.     - Control characters in escape sequences now act like a true VT100.
  821.     - F10 now works from init files.
  822.     - Right (or Left) AMIGA with period (".") sends a BREAK to the host
  823.       from the keyboard.
  824.     - XMODEM status kept down to one line for a file transfer.
  825.  
  826. v2.0 860823 DBW    - Major rewrite:
  827.     - Emulator now compiles under either MANX or LATTICE by defining
  828.       the appropriate compiler type in VT100.H.
  829.     - Sped up code to an effective baud rate of (about) 8k. This means
  830.       that clear text at 4800 baud should be no problem.
  831.     - Added XON/XOFF generation so that characters should not get lost
  832.       any more at 9600 baud (when receiving clear text).
  833.     - Got rid of all command line switches and environment variables.
  834.       Instead upon invocation the program searches first for any file
  835.       named on the command line, then looks for VT100.INIT in the
  836.       current directory and finally searches for C:VT100.INIT.
  837.       All parameters can be set in the init file, and a sample VT100.INIT
  838.       is provided in VT100.DOC that shows all possible options.
  839.     - All parameters that are set by VT100.INIT are defined in VT100.H
  840.       (variables starting with "p_"). This allows you to compile your
  841.       own defaults into the code.
  842.     - You can now set the number of lines (for all you EMACS freaks :-).
  843.       On an interlaced screen this gives you upto a 48 line terminal.
  844.     - WORKBENCH colors are NEVER touched.
  845.     - In an attempt to keep the size down, the color palette menu item
  846.       has been removed (current). Code is about 36K in size with a
  847.       run time image (using workbench screen) of about 88k.
  848.     - Many bugs fixed including reverse scrolling with descenders,
  849.       reverse video at end of line, clearing with scrolling regions,
  850.         ... and 20 or more others.
  851.     - File capture now no longer sends the filename to the host.
  852.     - BOLD (<esc>[1m) has now been added by using an additional color
  853.       when you specify a depth of 2 (instead of 1) bitplane.
  854.     - UNDERLINE (<esc>[4m) has now been added.
  855.     - The handling of remote (host) escape sequences has been completly
  856.       re-written (thanks to Dawn Banks for all the work).
  857.     - Function keys (and shifted function keys) can now be bound to
  858.       arbitrary strings (Jim Ravan gets his macros). See VT100.DOC
  859.       for details.
  860.     - Cursor has no been reduced to the size of a normal character for
  861.       easier readability.
  862.     - XMODEM has been improved (by Steve Drew) to use a timer device
  863.       (for timeouts) and to abort immediately if the user types <ESC>.
  864.     - KERMIT has been completely re-written and appears to work fine,
  865.       thanks to the efforts of Steve Drew.
  866.     - New menu item allows script file support. Module written by
  867.       Steve Drew. See VT100.DOC for details.
  868.  
  869.  
  870.  
  871. ---------------
  872. Known problems:
  873. ---------------
  874.     - None.
  875.  
  876.  
  877.  
  878. --------------------------------------------------
  879. Suggestions/bug fixes not implemented (as of yet):
  880. --------------------------------------------------
  881.     - Custom screen should use a borderless backdrop window
  882.     - Quit from keyboard should be supported (for above)
  883.     - Automatic maximum sizing of window should happen
  884.     - Screen should be resizable
  885.     - AT TIME should be implemented in scripts (besides DELAY)
  886.     - Kermit should create sub directories (when necessary)
  887.     - Use a disk font for graphic character set
  888.     - Allow the mouse to be sent to the host (for various EMACSs)
  889.     - Kermit VM/CMS (IBM) protocol support (it works for me, how about
  890.       you?)
  891.     - Allow the user to use a keymap different from the default one.
  892.     - Allow use of an "external" transfer protocol.
  893.     - Allow use of other than 8-point fonts.
  894.  
  895.  
  896.  
  897. -------------
  898. Installation:
  899. -------------
  900.     The binary files in this archive may be extracted by the bourne shell
  901.     (/bin/sh) or the shar program using the "unshar switch (-u)", contact
  902.     me if you need a copy of this version of shar.
  903.  
  904.     REMEMBER: Set the correct compiler definition in VT100.H
  905.  
  906.  
  907.  
  908. ------
  909. Files:
  910. ------
  911.     README        - this file
  912.     vt100.doc    - documentation for the terminal emulator
  913.     Makefile    - make file for the emulator (under MANX AZTEC-C)
  914.     vt100.h        - include file used by all other modules
  915.     window.c    - manager for window and keyboard
  916.     vt100.c        - main module, handles menus
  917.     remote.c    - handle remote characters (vt100 emulation)
  918.     kermit.c    - kermit protocol (to transfer text files on VMS
  919.               select the CRLF option on the transfer mode menu,
  920.               otherwise use image mode).
  921.     init.c        - startup code
  922.     xmodem.c    - xmodem protocol that understands AMIGA binary and
  923.               text file formats (automatically).
  924.     script.c    - script control package
  925.     expand.c    - filename expansion (wildcards) and dir setting
  926.  
  927.  
  928.  
  929. --------
  930. Contact:
  931. --------
  932. Please send bugs/comments/suggestions/praise for V2.8 to:
  933.  
  934.     Tony Sumrall at USENET: acs@amdahl.com
  935. SHAR_EOF
  936. #    End of shell archive
  937. exit 0
  938. -- 
  939. Bob Page, U of Lowell CS Dept.  page@swan.ulowell.edu  ulowell!page
  940. Have five nice days.
  941.